<%
dim sShowMenu
dim sPageSecLev
dim sclient

sShowMenu = Request.QueryString("sShowMenu")
sClient = Request.QueryString("userid")	'from PWC login page

dim dllBulletins
dim sAllowBulletins
			
'are there any bulletins?
set dllBulletins = CreateObject("KT_Search.clsBulletin")
	
sAllowBulletins = dllBulletins.FindBulletins()
		


	
%>

<script language="vbscript">
'Show and hide different menus

sub ShowHide()
	'divFunds.style.display = ""
end sub
	
sub printIt()
	divKeyTaxMenu.style.display = "none"
	window.print
	divKeyTaxMenu.style.display = ""
end sub
	
</script>

<link rel="stylesheet" type="text/css" href="../../stylesheets/keytaxv2.css">

<div id="divKeyTaxMenu" style="display:">

<%if sShowMenu <> "false" then%>

<table BORDER="0" width="100%" cellpadding="0" cellspacing="0">
	<tr valign="top">
		<td bgcolor="#636994" background="../../pics/menu_back_line.gif" height="75">
			<%if UCase(session("KeyTaxUser")) = "DEMO" then%>
				<img src="../../pics/demo_menu_back.gif" WIDTH="313" HEIGHT="75"></td>
			<%else%>
				<img src="../../pics/menu_back.gif" WIDTH="313" HEIGHT="75"></td>
			<%end if%>
		<td colspan="2" bgcolor="#636994" valign="bottom" align="right" background="../../pics/menu_back_line.gif">
			<%
			if session("KeyTaxUser") = "" then
			%>
				<table>
					<tr>
						<td><img src="../../pics/icon_loggedout.gif"></td>
						<td><font color="white" size="1"><b>You are not logged in! &nbsp;</b><font></td>
					</tr>
				</table>
			
			<br><br>
					
			<a href="../../pages/login/login.asp?sUsername=<%=sClient%>"><img src="../../pics/button_login.gif" border="0" alt="Log in to the Keytax System" align="right" WIDTH="81" HEIGHT="20"></a>
			
			<%
			else
			%>
				<table>
					<tr>
						<td><img src="../../pics/icon_loggedin.gif"></td>
						<td><font color="white" size="1"><b>You are logged in as &quot;<%=session("KeyTaxUser")%>&quot;&nbsp;</b><font></td>
					</tr>
				</table>
				
			<br><br>
			
			<a href="../../pages/login/login.asp?logout=2"><img src="../../pics/button_logoff.gif" border="0" alt="Log off from the Keytax System" align="right" WIDTH="81" HEIGHT="20"></a>
			
			<%
			end if
			%>
			
		</td>
	</tr>
	<tr bgcolor="#848AAD" align="left" height="25">
		<td colspan="2">
			<%
				if not session("KeyTaxUser") = "" then
			%>
			
			<!--#include file="newmenu.asp" -->
			
			<!-- <a href="../../pages/funds/funds.asp"><img src="../../pics/menu_funds.gif" name="picFunds" border="0" onClick="ShowHide()"></a>			<a href="../../pages/users/user.asp"><img src="../../pics/menu_users.gif" name="picUsers" border="0"></a>			<a href="../../pages/directive/directive.asp"><img src="../../pics/menu_employers.gif" name="picEmployers" border="0"></a>			<a href="../../pages/directive/directive.asp"><img src="../../pics/menu_directives.gif" name="picDirectives" border="0"></a>			<a href="../../pages/directive/directive.asp"><img src="../../pics/menu_clear.gif" name="picClear" border="0"></a>			-->
			<%
				end if	
			%>
		</td>
		<td align="right" valign="middle">
		
			<% if sAllowBulletins = "Y" AND session("KeyTaxUser") <> "" then %>
				<img name="imgBull" src="../../pics/icon_newbulletin.gif" border="0" alt="View KeyTax Bulletins" onclick="CallLink('../homepage/default.asp#Bulletins')" style="cursor:hand">
			<% end if %>
			
				<img name="imgPrint" src="../../pics/icon_print.gif" border="0" alt="Print this page" onclick="printIt()" style="cursor:hand">
				
				&nbsp;&nbsp;
		</td>
	</tr>
</table>

<%end if%>

</div>